From: Lars Ingebrigtsen <larsi@gnus.org>
Date: Sun, 5 Dec 2021 00:51:12 +0000 (+0100)
Subject: Fill Emacs version on about screen
X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1^2~5^2~16^2~4056^2~16
X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=ab41b1c5541cd0b1a72b1f0358dcbb0c2f60dc3b;p=emacs.git

Fill Emacs version on about screen

* lisp/startup.el (fancy-about-text): Fill the Emacs version,
since it's too long these days.
---

diff --git a/lisp/startup.el b/lisp/startup.el
index d4bb338fc0b..a57ce3da05f 100644
--- a/lisp/startup.el
+++ b/lisp/startup.el
@@ -1651,7 +1651,11 @@ Each element in the list should be a list of strings or pairs
      " operating system.\n"
      :face (variable-pitch font-lock-builtin-face)
      "\n"
-     ,(lambda () (emacs-version))
+     ,(lambda ()
+        (with-temp-buffer
+          (insert (emacs-version))
+          (fill-region (point-min) (point-max))
+          (buffer-string)))
      "\n"
      :face (variable-pitch (:height 0.8))
      ,(lambda () emacs-copyright)